Event - View commands

back to section start!

 
  You had a bunch of files selected and then caused a Read, HexRead, Show or 
Play event.  ArcDir will work upon the first selected. 
 
  1        when pos(event,viewcommands) > 0 then do 
  2          lister query handle firstsel 
  3          parse var result '"' namestr '"' 
  4          lister select handle '"'namestr'"' off 
  5          lister refresh handle 
  6          call viewsingle 
  7          end 
 
Line: 
 1      The event matched one in our viewcommands string set back  here . 
 2      We get the name of the FIRST selected entry. 
 3      Parse the result out from between the quotes. 
 4      Turn the selection state for the entry to off. 
 5      Refresh the lister display so you see the selection state change. 
 6      Call the  viewsingle  routine on that one entry. 
 7      End of the When loop. 
 

DOpus PLUS - giving you that bit extra...